| NodeIsGrandparent method |
Applies to
TGUITestRunner
Declaration
Function NodeIsGrandparent(ANode: TTreeNode): boolean;Implementation
function TGUITestRunner.NodeIsGrandparent(ANode: TTreeNode): boolean;
var
AChildNode: TTreeNode;
begin
Result := false;
if ANode.HasChildren then
begin
AChildNode := ANode.GetFirstChild;
while AChildNode <> nil do
begin
Result := AChildNode.HasChildren or Result;
AChildNode := ANode.GetNextChild(AChildNode);
end;
end;
End; |
|
|